5 POKE53269,0:GOSUB 6000 6 : 7 : 8 REM THE FOLLOWING LINES ARE ORIGINAL 9 : 10 PRINT"[147]";:V=53248:S=54272:POKEV+32,9:POKEV+33,0:REM 64 TIMETRIAL - S.GLAZER 20 FORT=832TO958:POKET,-255*(ABS(T-881.5)<41):NEXT:POKE2040,13:POKE2041,14 30 X=52:Y=136:POKEV+27,2:POKEV+21,3:POKEV+29,2:POKEV+39,4:POKEV+40,5:POKEV+2,42 40 POKEV+3,128:POKEV+21,3:Q=PEEK(V+31):PRINT"[159]0":T$="[149] " 50 T$=T$+" ":U$=LEFT$(T$,20):PRINTTAB(12)U$:FORT=1TO10:PRINTTAB(10)T$ 60 NEXT:PRINTTAB(12)U$:POKES+24,15:POKES+6,240:POKES+4,49:TI$="000000" 70 POKEV+1,Y:POKEV+16,X/256:POKEV,X-PEEK(V+16)*256:Q=PEEK(V+30)=PEEK(V+31) 80 PRINT""TAB(18)INT(TI/6)/10:J=PEEK(56320):F=9*(ABS(A)+ABS(D)) 85 IFF>255THENF=255 90 D=D+((JAND1)=0)-((JAND2)=0):A=A+((JAND4)=0)-((JAND8)=0):X=X+A:Y=Y+D:POKES,F 100 IFPEEK(V+31)AND1ORX<24ORY<47ORY>229ORX>320THENPOKEV+39,1:A=0:D=0:POKEV+39,4 110 IFC*PEEK(V+30)THENC=0:L=L+1:POKES-V,48+L:IFL=3THEN200 120 C=C+(X>278)*(ABS(Y-160)<10):GOTO70 130 : 131 : 132 : 133 REM THE FOLLOWING LINES ARE ADDED 134 : 135 : 136 : 200 PRINT"[199][193][205][197] [207][214][197][210] : [196]O YOU WANT TO PLAY AGAIN?":POKE53269,0 201 GETA$:IFA$="Y"ORA$="[217]"THENRUN10 202 IFA$="N"ORA$="[206]"THEN 300 225 GOTO 201 300 POKE53269,.:POKE54296,. 301 OPEN15,8,15,"R0:ONE-SCREEN WINNERS=ONE-SCREEN WINNERS":INPUT#15,ER:CLOSE15 302 IFER<>63THENPRINT"[147]":END 305 LOAD"ONE-SCREEN WINNERS",8 6000 POKE53280, 0:POKE53281, 0:PRINT"[147]"; 6001 PRINT"[155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]" 6002 PRINT"[152] [204][207][193][196][211][212][193][210] [208][210][197][211][197][206][212][211] " 6003 PRINT"[151][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]" 6004 PRINT"[172] [146][187]" 6005 PRINT" " 6006 PRINT" " 6007 PRINT"[163][163][163][163][163][163][163][163][163][160] t i m e t r i a l [146][163][163][163][163][163][163][163][163][163][160] "; 6008 PRINT" [160]" 6009 PRINT"[163][163][163][163][163][163][163][163][163] [146][163][163][163][163][163][163][163][163][163] bY s. gLAZE"; 6010 PRINT"R [160]" 6011 PRINT"[163][163][163][163][163][163][163][163][163] [160][146][163][163][163][163][163][163][163][163][163] "; 6012 PRINT" " 6013 PRINT"[188] [146][190]" 6014 PRINT"[155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]" 6015 PRINT"[152] press space[160]to[160]continue " 6016 PRINT"[151][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]" 6020 GETA$:IFA$<>" "THEN6020 6030 PRINT"[147]":RETURN